home *** CD-ROM | disk | FTP | other *** search
/ 8bitfiles.net/archives / archives.tar / archives / genie-commodore-file-library / C64-128BBS / AABBS.ARC / DOWN BBS / c64.bas
Unknown  |  2019-04-13  |  785 b 

open in: MacOS 8.1     |     Win98     |     DOS

view JSON data     |     view as text


This file was not able to be converted.
This format is not currently supported by dexvert.

ConfidenceProgramDetectionMatch TypeSupport
66% dexvert GW-BASIC (document/gwBasic) ext Supported
66% dexvert GFA-BASIC Atari (other/gfaBASICAtari) ext Supported
1% dexvert Amiga BASIC Protected File (other/amigaBASICProtectedFile) ext Unsupported
1% dexvert BAS VBDOS Pro 1.0 Source (other/basVBDOSPro10Source) ext Unsupported
1% dexvert Visual Basic Tokenized Source (other/visualBasicTokenizedSource) ext Unsupported
1% dexvert ZBASIC (other/zbasic) ext Unsupported
100% file data default
100% gt2 Kopftext: '100 OPEN5,2,3,CHR' default (weak)



hex view
+--------+-------------------------+-------------------------+--------+--------+
|00000000| 31 30 30 20 4f 50 45 4e | 35 2c 32 2c 33 2c 43 48 |100 OPEN|5,2,3,CH|
|00000010| 52 24 28 36 29 2b 43 48 | 52 24 28 2e 29 3a 52 45 |R$(6)+CH|R$(.):RE|
|00000020| 4d 22 14 14 14 14 8d 05 | 0e 08 00 0a 31 31 30 20 |M"......|....110 |
|00000030| 42 31 3d 35 36 35 37 37 | 3a 42 32 3d 35 36 35 37 |B1=56577|:B2=5657|
|00000040| 39 3a 49 46 50 45 45 4b | 28 34 30 39 36 30 29 3c |9:IFPEEK|(40960)<|
|00000050| 3e 31 34 38 54 48 45 4e | 42 31 3d 33 37 31 33 36 |>148THEN|B1=37136|
|00000060| 3a 42 32 3d 33 37 31 33 | 38 0a 31 32 30 20 49 4e |:B2=3713|8.120 IN|
|00000070| 50 55 54 22 93 0e 08 9f | d4 49 4d 45 3a 20 48 48 |PUT"....|.IME: HH|
|00000080| 4d 4d 53 53 20 20 30 30 | 30 30 30 30 9d 9d 9d 9d |MMSS 00|0000....|
|00000090| 9d 9d 9d 9d 22 3b 54 49 | 24 0a 31 33 30 20 50 52 |....";TI|$.130 PR|
|000000a0| 49 4e 54 22 11 cd 4f 56 | 45 20 d4 2f c4 20 53 57 |INT"..OV|E ./. SW|
|000000b0| 49 54 43 48 20 54 4f 20 | c4 22 3a 50 52 49 4e 54 |ITCH TO |.":PRINT|
|000000c0| 22 cd 4f 56 45 20 c1 2f | cf 20 53 57 49 54 43 48 |".OVE ./|. SWITCH|
|000000d0| 20 54 4f 20 c1 00 0a 31 | 34 30 20 46 4f 52 49 3d | TO ...1|40 FORI=|
|000000e0| 2e 54 4f 31 30 30 3a 50 | 4f 4b 45 42 32 2c 33 32 |.TO100:P|OKEB2,32|
|000000f0| 3a 50 4f 4b 45 42 31 2c | 2e 3a 4e 45 58 54 3a 50 |:POKEB1,|.:NEXT:P|
|00000100| 52 49 4e 54 22 11 00 0a | 31 35 30 20 50 52 49 4e |RINT"...|150 PRIN|
|00000110| 54 22 d4 49 4d 45 3a 20 | 20 22 54 49 24 22 91 22 |T".IME: | "TI$"."|
|00000120| 3a 49 46 28 50 45 45 4b | 28 42 31 29 41 4e 44 38 |:IF(PEEK|(B1)AND8|
|00000130| 29 54 48 45 4e 31 35 30 | 0a 31 37 30 20 50 4f 4b |)THEN150|.170 POK|
|00000140| 45 42 31 2c 33 32 3a 46 | 4f 52 49 3d 31 54 4f 33 |EB1,32:F|ORI=1TO3|
|00000150| 45 33 3a 4e 45 58 54 3a | 50 52 49 4e 54 3a 50 52 |E3:NEXT:|PRINT:PR|
|00000160| 49 4e 54 3a 46 4f 52 49 | 3d 2e 54 4f 32 30 3a 47 |INT:FORI|=.TO20:G|
|00000170| 45 54 23 35 2c 41 24 3a | 50 52 49 4e 54 23 35 3a |ET#5,A$:|PRINT#5:|
|00000180| 4e 45 58 54 0a 31 38 30 | 20 50 52 49 4e 54 23 35 |NEXT.180| PRINT#5|
|00000190| 2c 22 0a 07 c3 4f 4e 4e | 45 43 54 45 44 20 41 54 |,"...ONN|ECTED AT|
|000001a0| 3a 20 20 22 3b 54 49 24 | 0a 31 39 30 20 50 52 49 |: ";TI$|.190 PRI|
|000001b0| 4e 54 23 35 2c 22 0a 0a | 0a d7 45 4c 43 4f 4d 45 |NT#5,"..|..ELCOME|
|000001c0| 20 54 4f 20 54 48 45 20 | c1 4c 4c 20 c1 4d 45 52 | TO THE |.LL .MER|
|000001d0| 49 43 41 4e 20 c2 c2 d3 | 00 0a 32 30 30 20 50 52 |ICAN ...|..200 PR|
|000001e0| 49 4e 54 23 35 2c 22 0a | c9 27 4d 20 53 4f 52 52 |INT#5,".|.'M SORR|
|000001f0| 59 2c 20 42 55 54 20 54 | 48 45 20 53 59 53 54 45 |Y, BUT T|HE SYSTE|
|00000200| 4d 20 49 53 00 0a 32 31 | 30 20 50 52 49 4e 54 23 |M IS..21|0 PRINT#|
|00000210| 35 2c 22 0a 54 45 4d 50 | 4f 52 41 52 49 4c 59 20 |5,".TEMP|ORARILY |
|00000220| 44 4f 57 4e 2e 20 20 d4 | 48 45 20 53 59 53 54 45 |DOWN. .|HE SYSTE|
|00000230| 4d 20 57 49 4c 4c 20 42 | 45 00 0a 32 32 30 20 50 |M WILL B|E..220 P|
|00000240| 52 49 4e 54 23 35 2c 22 | 42 41 43 4b 20 4f 4e 2d |RINT#5,"|BACK ON-|
|00000250| 4c 49 4e 45 20 49 4e 20 | 41 50 50 52 4f 58 49 4d |LINE IN |APPROXIM|
|00000260| 41 54 45 4c 59 20 32 20 | 48 52 53 2e 00 0a 32 33 |ATELY 2 |HRS...23|
|00000270| 30 20 50 52 49 4e 54 23 | 35 2c 22 0a d0 4c 45 41 |0 PRINT#|5,"..LEA|
|00000280| 53 45 20 43 41 4c 4c 20 | 42 41 43 4b 20 54 48 45 |SE CALL |BACK THE|
|00000290| 4e 2e 00 0a 32 34 30 20 | 50 52 49 4e 54 23 35 2c |N...240 |PRINT#5,|
|000002a0| 22 0a 0a 0a d4 48 41 4e | 4b 20 59 4f 55 20 46 4f |"....HAN|K YOU FO|
|000002b0| 52 20 43 41 4c 4c 49 4e | 47 2e 00 0a 32 35 30 20 |R CALLIN|G...250 |
|000002c0| 50 52 49 4e 54 23 35 2c | 22 0a 0a 0a c4 49 53 43 |PRINT#5,|"....ISC|
|000002d0| 4f 4e 4e 45 43 54 45 44 | 20 41 54 3a 20 20 22 54 |ONNECTED| AT: "T|
|000002e0| 49 24 0a 32 36 30 20 49 | 46 50 45 45 4b 28 36 36 |I$.260 I|FPEEK(66|
|000002f0| 39 29 3c 3e 50 45 45 4b | 28 36 37 30 29 47 4f 54 |9)<>PEEK|(670)GOT|
|00000300| 4f 32 36 30 0a 32 37 30 | 20 47 4f 54 4f 31 34 30 |O260.270| GOTO140|
|00000310| 0a | |. | |
+--------+-------------------------+-------------------------+--------+--------+